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OPERATION OF UFSSP 


1. SOFTWARE /HARDWARE REQUIREMENTS 
CPC 6500 

This program runs under the TRW/TSS system and requires 55,000 
words of core, 5000 words of disk storage and up to 4 tape units 
during execution. This does not include disk requirements for I/O 
and overlay/ loading. The program is coded in FORTRAN IV. 

UNIVAC 1108 

This program runs under the exec 8 system and requires 54,000 
(+ system space) words of core, 5000 words of drum storage and up to 
4 tape units (plot tape is a dummy) during operation. This does not 
include drum requirements for I/O and overlay/loading. The program is 
coded in FORTRAN IV compatible with FORTRAN V. 

H . OVE RALL DECK SET U? 

CPC 6500 

1. The following diagram assumes that the program, in relocatible 
form, is stored on disk under file name UFSCS. 
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2. Deck setup for UFSSP with use of control system assuming "USER" 
subroutine is on a relocatible file - USERl. 



3. If desired the user subroutine can be compiled from source cards 
and then the relocatible deck would be on LG0 and the remaining 
control cards would be identical to 2. above. The source deck 
could be part of the deck setup or come from a source file. 


UNIVAC 1108 

1. In order to exemplify the control cards necessary to run the UFSSP 
on the NASA/MSFC computing facilities, the following diagram assumes 
that the program resides on a magnetic tape with reel number 1357 and 
that the Structures Tape resides on reel number 2468. 
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III. TAPE /DISK/ DRUM USAGE 



CDC 

UNIVAC 



Program 

File 

File 

Tape 


Symbol 

No. 

No. 

Usage 

Mode 

AS 147 T 

16 or 

25 9 or 25 

Structures Tape (can be on cards) 

Binary or BCD 

M0DTPE 

40 

8 

Modal Data Tape 

Binary 

HISTPE 

8 

21 

History Data Tape 

Binary 

PL0TPE 

50 

3 

CALC0MP Plot Tape (not defined 
for UNIVAC) 


IN 

5 

5 

Input Card Set on Disk/Drum 

BCD 

0UT 

6 

6 

Print Data Set on Disk/Drum 

BCD 

INPSAV 

30 

1 

Input Set for Previous Case 
on Disk/Drum 

Binary 

ICFILE 

60 

2 

Temp Storage for Control System 
Modal Data on Disk/Drum 

Binary 


See problem definition for tape record formats. 


IV. LIST OF STANDARD /NO NS TANDARD LIBRARY ROUTINES 


Name 


Purpose/ Comments 


LIN 

LESK 

RKAM(S) 

CPL0T 

XYPL0T 

FSF 

INTBCD 

PL0T 

SINC0S 

SQRT 

ATAN 

SETC0 


Linear Interpolation Subroutine 

Linear Equation Solver 

RUNGA KUTTA/ Adams -Moulton Integration 

CALC0MP Plot Driver Routine-Not Good on UNIVAC 

CALC0MP Plot Routine-Not Good for UNIVAC 

ft II It If II II It 

II II If ft It If II 

II II II If II II II 

Sine/Cosine Routine (standard library routine) 
Square Root Routine " " " 

Arc Tangent Routine " " " 

Dynamics Sequencing Routine 
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V. 


PROGRAM LOAD MAP 


See listing of the program load with overlay structure and cross 
reference information immediately following, 

CPC Load Map 
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LOAD-MAP. : y OVERLAY 12/12/72. 2C.45.01. PAGE 




LOAD OPTIONS - CF, 

CR, LR, X 





FL RECUIREO TO LOAD 
FL RECUIRED TO RLN 

7 1 20 C ■ 
14650C 



LOADER DIRECTIVES. 


1. OVERLAY (LiFSSP»C?C) 
2 . C VE RL A Yl U F S S P , 1 , C ) 

3. OVERLAY (UFSSP, 2 ,C) 

4. GVERLAY(UFSE r f3tC) 






LOAD MAP. 1 OVER LAY C VLQO CO 12/12/72. 20 .4 5.01. PA GE 
FWA OVERLAY ICO LW A OVERLAY 61222 LENGTH 6 

OVERL AY IdHTTEN fc“~lTFSSP ~ 1 ~ ' 


BLOCK ASSIGNMENTS. 


BLOCK , 

ADDRESS 

LENGTH 

FILE 

DATE 

/CVLT AB $/ 

101 

26 


tC-f'rG,:/. y ; ■f't' -r-'K'y-* '-■■'rC 

MAIN 

127 

34 

NEW 

12/C4/72. 

GLOBAL 

163 

10 

NEW 

11/30/72. 

ERROR. 

173 

2465 

NEW 

12/11/72. 

GJI ;• 

266 C 

f:V- 132 

NEW 

C 3/08/72. 

. HffADE 

3 012 

4 3 

NEW 

03/08/72. 

M ASTON 

3 C, 5 5 

272 

NEW 

n/28/72 . 

ACGOER 

33 A 7 

12 

RUNLIB 

*NC-OATE* 

DUMiP 

336 1 

3C2 

RUNLIB 

11/2C/7C. 

ENDFIL 

3 6 6 3 

73 

RUNLIB 

* NO -CATE* 

» . CUTPTC 

3 756 

f-f 13 34 

, RUNLIB 

C4/C6/72. 

OVERLAY 

5 312 

127 

RUNLIB 

11/26/72. 

REWINM 

54 4 1 

7 3 

RUNLIB 

VNC-DATE* 

SI NCOS 

5534 

77 

RUNLIB 

* N C - D A T E * 

SORT 

563 3 

43 

RUNLIB 

♦NC-CATE* 

SYSTEM 

5676 

1214 

RUNLIB 

04/C6/72. 

GETBA 

7112; 

17 

RUNLIB 

* N C - C A T E * 

Slot 

ft.-: 7131 

4C7 

RUNLIB 

C4/C6/72. 

SYSTEMQ ' 

7 5 4 C ■ 

4 3 

RUNL I B 

11/26/72. 

CPUCDD 

7603 

13 

RUNLIB 

C5/2B/71. 

CPOCIO 

7616 

257 

RUNLIB 

C9/19/72. 

CPUSYS 

ICC 7 5 

24 

RUNLIB 

1C/10/71. 

/FIGBUF3./ 

10121 

11760 



/STC.APD/ 

221C 1 

2 



/GIMOTR/ 

22103 

6 






LCA D_MAP . OVERL A Y CVLGCCC 12/12/72. 20.A5.01. .PAGE 
BLOCK” ASSIGNMENTS^. 



BLOCK 

ACCRESS 

LENGTH 

FILE 

CATE 





/TPHASE/ 

22111 

l # 




y- •••'/ '• V.*' 

yY'/'Y; v'YF ^;.y • . ; . 


/FLAG / 

22112 

6 1C 







/OISTBB/ 

22 72 2 

1252 







/DVNINP/ 

2 A 17 A 

2AA3 







/ 0 R B Q / 

26627 

57 







/CRT I CC/ 

267 1 6 

2 







YOU TP/ 

2 b 7 2 C 

667 







/secp/ 

2 7 6 C 7 

5 16 




• . 'y -W •••’ " 



/STVCTR/ 

30325 

1272 







/TBLINP/ 

31617 

1152 







/ F T C F Q/ 

32 77 1 

5 16 







/ M 0 D E C / 

32507 

1 6 A C 3 



•V\ y.y..:>: 


y • ,yyy..oy . y;- . . 


/RKAMST/ 

52112 

7 





•y , ; y-y. y : . -.y y •• 


/CUT COM/ 

5212 1 

1 C 7 







/CON I NT/ 

5 22 2 C 

A 6 A 5 

1 






/INPFLG/ 

57C75 

A 6 A 







/CONI. CG/ 

5756 1 

1211 







LCAD MAP. ' OVERLAY 

CVLOICO 12/12/72. 

20.45.01. PAGE 

4 


FWA CVERLAY 61222 

LW A OVERLAY 114506 

LENGTH 23264 



OVERLAY WRITTEN TO : 

!■ 

UFSSF 





BLOCK ASSIGNMENTS. 


BLOCK 

: ADDRESS 

length: 

FILE - 

CATE 

-V ■ 

INPCCN 

61223. 

3 36 ; 

NEW 

11/30/72. 

• ; v '': '■ ' . 'K v '. : A 

HEADI 

61561 

150 

NEW 

03/08/72. 


INCCNT 

6173 1 

556 

NEW 

12/05/72. 


INFLG 

62507 

124 

N E W 

11/28/72. 


| INPCH 

6 2632 

,.-Tr 56 5 

NEW 

11/28/72. -.*■■■ 


:■ ■ ■ inpci p . 

■ 6 34 20 V 

' -VT; : 4 2 5 

new : 

11/28/72. 

yh' : '6 • • 

. I NPDYP 

640^5 . 

2 75 

NEW 

C3/C8/72. 

. •••' x ' •• • . ' •... 

INPICP 

64242 

201 

NEW 

03/08/72. 


INPRCC 

6454 2 

1365 

NEW 

11/28/72. 


INPPT 

66130 

1 157 

NEW 

12/09/72. 


INPSTR - 

6 7 30 7 

+.x\ 1323 ' 

NEW 

11/28/72. 

V -'.-f K"-' ' :5 V-V' ■■ • i 

^ INPTAP : 

70632 

: 3 C 7 

NEW 

. 03/08/72 . 

/£:>■' ... ; • 2 : 

INPIER 

7114 1 

3 53 

NEW 

11/28/72. 

• •-•V; /•' •• ‘ • v< •• • ■/’. ' ■ • 

INP2ER 

71514 

3 30 

NEW 

11/28/72. 


INP3FR 

72044 

.3 3 6 

NEW 

11/28/72. 


SETC.0 

72402 

1272 

NEW 

03/08/72. 


UTILP 

73674 

( 6 0 

NEW 

03/08/ 72. 


UTIL PR 

7 3 754 

. 345 

.NEW 

03/08/72. 

"; ;S : >' ••• '• 

INPUTB 

743 2 1 

3 1 5 

RUNLIB 

Cl/16/72 . 

-N. V : ' ' ■ " . -5 . 

INPUTC 

74636 

1211 

RUNL IB 

04/06/72. 


I NPUTM 

76047 

1661 

RUNLIB 

08/11/71. 


OUT PTB 

7 7 7 2 C 

2 50 

RUNLIB 

06/02/71. 





LG A 0 MAP. ' OVER L AV CV LC1C0 12/ 12/72. 20. 45. 0 1 . JP AGE 

BLOCK ASSIGNMENTS. 

BLOCK ADDRESS LENGTH FILE DATE 


LCAD MAP. CVERUI CVL 02C 0_ 12/12/ 72* 

F ViA' OVERLAY 61222 LW A OVERLAY 104266 


OVERLAY WRITTEN TO UFSSP 


BLOCK ASSIGNMENTS. 


BLOCK 

ADDRESS 

LENGTH 

FILE 


MCCCTL 

61223 

1 C 70 

NEW 


CROSS 

62313 

50 

NEW 


DOT 

.62363 

30 

NEW 


GETMDE 

6 2 A 1 3 

361 

NEW 


MCALC 

6 2 7 7 A 

24 7 7 

NEW 


MINT 

6 5 4 7 2 

i-W 37 3 

NEW 


KMT APE 

6 6 066 

616 

NEW 


SPECFB 

6 6 70 4 

4735 

NEW 


I FEND F 

7364 1 

3 2 

KUNLIB 


INPUTS 

73 67 3 

315 

RUNLIB 


INPUTC 

742 1 C 

1211 

RLNLIB 


m OUT P TB ; ; 

7542 1 

;■ 2 5C 

RUNLIB 


/ ICTLMQ/ 

7567 1 

565 




5610 


DATE 

11/30/72^ 

03/08/ 72 . 

03/08/72. 

03/08/72^ 

11/30/72. 

03/06/72. 

11/30/72. 

03/06/72. 

*NC-DATE* 

Cl/16/72. 

0 A'/ 06/ 72. 

G6/02/71 . 









LOAD MAP 

. overlay 

CVL03C0 

12/12/72 

. 20.45.01. 

PAGE 7 





F V* A OVERLAY 61222 

LW A OVERLAY 135632 

LENGTH 

544 1C 



■ 


OVERLAY 

WRITTEN TC 

OFSSP • 

; T/ '• .7 . ' ' ■ . 






BLOCK ASSIGNMENTS. 

rr~~~ 

... BLOCK 

■ : ADDRESS 

LENGTH 

FILE 

DATE 





i 

i 

; CALCPR. 

' 61223 

234 

NEW 

12/12/72. 






DERIV 

614 5 7 

36 

NEW 

12/ 12/72. 






DFIRST 

61515 

301 

NEW 

C2/C8/72. 






ERROR 1 

62C 16 

25 

NEW 

08/29/72. 






CFTST 

' .-r. 6 204 2 

155 

NEW vVv 

03/08/72. 

- • . ' ■ ■ • .. .^.V 

: /.'. ’ . V . f ■ . “ .. . .• 




HEAD 

:■> 62 22 C 

4 7 

NEW . 

08/29/72. 

’ . . '' ‘5 ' V’ ; T’ ' 





HI STPC 

62267 

7CC 

NEW " 

11/28/72. 


■ • • •' . - • 




" H I ST PL 

63167 

4 5 4 

NEW 

i 1/27/ 72. 






INDER 

6 3 643 

44 

NEW 

03/08/72. 






I TIMER 

63707 

12 

NEW 

03/08/72. 






ORBIT 

6 3 721 : 

r 7 3 1 

• \ NEW . 

11/06/72. 






CUTCAL 

6 4 6 5 2 

152 

NEW 

08/29/72. 

T;. V : ' ■■ 


; >v v -V . 



PR I NON 

6 5 C 2 4 . 

< 1534 

NEW-;: 

12/05/72. 

• . v ;:; . •’ •- v 

, 

’ . v - ■ 



PR MO IN 

66 5 6 C 

20 3 

NEW 

03/08772. 






RIGAUX 

6 6 7 6 3 

764 

NEW 

08/29/72. 






PKAMS 

67747 

576 

NEW 

03/08/72. 






' 'SIT! ST 

TTTC5 ”45 

: ' ■ 16 5 

NEW 

0"3 /"C 8/72. 






UNPSTO 

70732 

152 

NEW.:, 

03/08/72. 

> . •••• ■ ! \ y/. • '• ' '• 





ABC 

7 1 1 C 4 

146 

NEW 

C3/C8/72. 






ABPC 

71252 

101 

NEW 

03/08/72. 






AEBC 

71353 

175 

NEW 

03/08/72. 






AEBPC 

7 1 5 5 C 

115 

NEW 

C3/C8/72. 





l . 

CDEL 

71665 

1C1 

■ NEW • ' 

03/08/72. 

•• TC T 





CROP 

71766 

45 

, NEW •• • 

03/08/72. 






CROSS 

7 2 C 3 2 

5 C 

NEW 

03/08/72. 







LCAC MAP. 

OVERLAY 

CVLC3CC 

12/12/72 

. 20.45.01. PAGE 8 





BLOCK ASSIGNMENTS. 









BLOCK 

ADDRESS 

LENGTH 

FILE 

DATE 






OCT 

72103 

30 

. NEW ■■ 

C3/C8/72. 






GDOTJ 

72133 

124 

NEW 

03/08/72. 






GJSUB 

722 57 

77 

NEW 

C3/C8/7 2. 






LIN 

72356 

122 

NEW 

03/08/72. 






M.NTR 

72 5CC 

A 5 

NEW 

03/06/72. 






M V 3 X 3 

7 2 5 A 5 

70 

NEW 

03/08/72. 






NNTR 

7 2635 

61 

new **.- 

C3/08/72. 


. ;• G : - 




NTERP 

727 1 6 

51 

NEW 

C 3 / C e / 7 2 . 

’ • .> : ■•■ ' ;§$ % '-.v-; : ' 

•- ’ y- 1 ■ 




SCAL 

72767 

52 

NEW 

03/08/72. 






STB A 

73041 

51 

NEW 

C3/C8/72 . 






STZ 

7 3112 

A 1 

NEW 

03/08/72. 






TAN 

73153 

37 

N E W 

C3/08/72. 



y*; . \-y\ • - 



UVOOT 

732 1 2 

A 6 

NEW 

C3/08/72. 

■ l 




1 ' ' ■ ; ' 

INTERC 

7326 C 

1 1 1 

NEW 

12/12/72. 






CF IRST 

7337 1 

136 

NEW 

11/30/72. 






RGDISI 

7352 7 

16 1 

NEW 

12/04/72. 






CON SYS 

73 7 1 C 

2 1 A 

NEW 

12/08/72. 





. h* * 

SNCPC-L 

7 A 1 2 A 

1 AO 

'■.NEW 

11/27/72. 





Co 

DBLPCL 

7 A 2 6 A 

2 A 7 

NEW 

12/08/72. 






SUM 2 

7 A 5 3 3 

112 

NEW 

11/27/72. 






SUM I 

7A6A 5 

55 

NEW 

11/27/72. 






SUM 3 

7 A 7 2 2 

133 

NEW 

11/27/72. 






MULDIV 

7505 5 

112 

NEW 

11/27/72. 






DZLIM ; 

7 516 7 

1 AO 

NEW 

11/27/72. 






C U A N 

7 5 32 7 

1 1A 

NEW 

11/27/72. 






CUTZ 

7 5 A A 3 

5 5 

NEW 

11/27/72. 

•; ■ >■••••• . •■Af ; ' ' / - v : -- 





SINFCT 

7 5 52 C 

A 7 

NEW 

11/27/72. 






HYS 

75567 

151 

NEW 

li/27/72. 






• RELAY 

7 5 7 A C 

2 1 A 

NEW 

11/27/72. 






DELAY 

761 5 A 

166 

NEW "Dr-:;. 

1 1/27/72. 



■ ■ V ' ' ’ 



T IMFCT 

76 3 A 2 

223 

NEW s'- ‘M- 

11/27/72. 






USER 

7 6 5 6 5 

1 10 

NEW : 

12/12/72. 






CSFGRC 

76675 

5 14 

N F; W 

12/08/72. 






CSSEN 

7 7 A 1 1 

561 

NEW 

12/08/72. 






PACCSV 

100172 

30 

NEW 

11/30/72. 




- 1 1 J 



L 0 A D MA P. CVER LAY CVL03CQ 12/12/72 . 20. 45.0 1 .._P AGE 
BLOCK ASSIGNMENTS. 



BLOCK 

ADDRESS 

LENGTH 

FILE 

DATE 


UNPCSV 

ICC 22 2 

3 n 

NEK 

11/30/72. 


DERIV1 

100252 

525 

NEW 

12/12/72. 


FLXAUX 

100777 

1155 

NEW 

1G/0A/72. 


FLXCOM 

10 2 1 5 A 

IOC 2 

NEW 

06/29/ 7 2. 


ELXDI S 

103156 

5 A 2 

NEW 

03/08/72. 


FL X LCD 

, 1C372C 

720 

NEW 

C 3/08/72. vr. .. 


CFEFD 

1CA6AC 

16 7 

■ NEW - 

C3/03/72. . , 


GFMEPD 

105027 : 

A3 2 

NEW 

03/08/72. 


G IMRT 

1 0 5 A 6 1 

255 

NEW 

09/26/72. 


Lt'SK 

105736 

A71 

NEW 

03/ 06/72. 


N A ICMP 

] 0 6 A 2 7 

A 3 6 

NEW 

C3/08/72. 


M A I P K T 

1 07 06 5 

• 7; 150 

NEW 

03/08/72. 7. * ; 


R1GCCM 

107225 

. 3501 

NEK . 

10 / 0 A/72. . - r ' - ' 


R I GDIS 

112726 

522 

NEW 

02/03/72. • ■ ; 


R IGLCD 

113A6C 

220 

NEW 

03/08/72. 


FLXCLD 

1 137CC 

1 7 A 

N fc W 

C8/28/72. 


R IGCLO 

1 1 A 0 7 A 

216 

NEW 

09/16/72. 

! 

AS I NCOS 

11 A3 12 

126 

RUNLIB 

*NC-CATF* V;0. ' '*? .. ’ 

M 

A TAN 

1 1 A A 5 G 1 

7 A 

RUNLIB 

♦ NOOATE* 

j 

CUTPTB 

1 1 A 5 A A 

2 50 

RUNLI8 

C6/02/71 . 


GUTPTN 

11 501 A 

5 A 7 

RUNLIB 

*NC-DAT t* 


RBAREX 

1 15563 

57 

RUNLIB 

♦NC-DATE* 


ALNLCG 

1 1 5 6 A 2 

67 

RUNLIB 

*NC-DATE* 

1 

. p XP ~ 

115721 

5? 

R UNIT'S 

^NC-DATE* 

! 

1 ■ ■ 

/ C S C A T A / 

11 60 1C 

A 7 A 



| 

1 

/TJHIST/ 

1 16 50 A 

66 




/CALLCD/ 

116572 

5CA 




/ C 0 N T F / 

117276 

2 5 52 




/PRNCAl. / 

1 2 2050 

2117 




/DFLAG/ 

125167 

26 




/ERASE/ 

12 52 1 5 

1173 




/ R 6 A U X Q / 

126A 1C 

3 A 2 l 


* 


/TDPARM/ 

13202 1 

5 C 5 




/CONST/ 

1 2 2 5 3 6 

30 




/ G R T K C K / 

132566 

12 




LCA D _M A P " 0 VJ R L AY G V L C 3 C 0 1 2/12 /72 . 20 . A_5.J)_1 . PAG E 10 

BLOCK AS SI G N ME MTS. 

BLOCK ADDRESS ' LENGTH FILE DATE 




LOAD MAP 

. OVERLAY 

CVLC4CC 

12/12/72 

. 20.45.01. PAGE 11 





F WA OVERLAY 61222 

LW A OVERLAY 127254 

LENGTH 46032 





OVERLAY. 

WRITTEN TC 

LFSSF ••• 


E: 3 \ •R.Y 




BLOCK ASSIGNMENTS. 


BLOCK 

ACCRESS 

LENGTH 

FILE 

CATE 


V.. : ' ' : '• •’ 



ROLL AD 

: : 61222 / 

10 7 

NEW 

00/28/72. 





CPLOT 

61222 

21653 

NEW 

12/G9/72. 





RCLD 

103205 

77 

NEW 

09/29/72. 





FSF 

1.C33C4 

44 

NEW 

C3/C7/72. 




r . " 

I NT BCD 

103250 

v 47 : 

NEW : 

C2/C7/72. 

' • 'Vrs ■ • •. 




XYPLCT 

1C 34 1 1 

•• 11050 

NEW ' 

12/09/72. 


: ■...■• . - • S.'- . 



AXIS 

114467 

414 

PLCTLIB 

*NC-DATE* 





LINE 

115102 

262 

PLCTLIB 

*N C-C A T E * 





NUMBER 

115365 

266 

PLCTLIB 

♦ NC-DATE*.: 





PLOT 

115652 

733 

PLCTLIB 

04/16/72. 





SCAL : 

1166C6 

150 

PLCTLIB 

^NC-CATc* 




ON 

SYMBOL 

116756 

420 

PLCTL I 0 

*NC-DATE* 


'KM: ■ 


! ' 

BACKSP 

117376 

174 

RUNLIB 

08/17/70. 


• • ' ■■■■;' . •• ‘ 



I FENDF 

117572 

32 

RUM IB 

*NC-CATE* 





INPUTB 

117624 

315 

RUNLIB 

01/16/72. 





ALNLCG 

120141 

67 

RUNL I B 

*NC-DATt* 





R B A I E X 

■ 12023C .. 

41 

RLNLI8 

♦NC-OATE* 


v-vu— ;-v 



R6ARFX 

1202 71 

V-' ; " E. 57 

RUNLIB 

*NC-DATE* 

r , y%r.J ' ''<?V 




.'. EXP 

120 3 50 

57 

RUNLIB 

♦ NC-DATE * 





/ R D T F M / 

120427 

3410 







/PLOT/ 

124037 

23 







/CONCNV/ 

1 2 4 C 6 2 

5 







/CPLXYV 

1 2 4 C 6 7 

3164 







/NCASE / 

127253 

1 









UNIVAC Load Map 


MAP, 15 UFSSP, UFSSP 
MAP 17M1- 10/27 -09 :05 -(.J) 


1 . 

2 . 

3. 

4. 

5. 

6 . 

7. 

8 . 

9. 

10 . 


11 . 


12 . 

13. 

14. 

15. 

16. 
17. 


18. 


19. 


20 . 

21 . 

22 . 

23. 

24. 


LIB SYS$*MSFC$ 

SEG A 

IN MAIN, GLOBAL, ERROR, MASTCN,HEADE,CPLOT, CROSS, DOT, GJI 
SEG B*, (A) 

IN INPCON, INPRED, INPCH, INPIER, INP2ER, INP3ER, INPSTR, INCONT 
IN INFLG,SETCO, INPRT, INPICP, INPDIP, INPDYP, INPTAP,UTILP 
IN UTILPR, HEADl, INPUT, INPUTl , INPUT2 , INPUT3 
SEG C*,B 

IN GETMDE,MCALC,MODCTL,RMTAPE,MINT, SPECFB, IMODEQ, ICTLMQ 
SEG D*,C 

IN CALCPR, DERIV, GETST, RIGAUX, PRINCN, HIS TPC , HIS TPL , ERRORl , HEAD 

IN DFIRST, I NDER , ORBIT , PRMOTN, ABC , ABPC , AEB C, AEBPC 

IN CDEL, CROP , GDOTJ , GJSUB , LIN, 0UTCAL, U.NPSTD 

IN MNTR , MV3X3 , NNTR , NTERP , S CAL , S TBA , S TZ , TAN 

IN UVDOT, STOST, RKAMS , PRNCAL, CONTF, TDPARM, RBAUXQ, ERASE 

IN DFLAG, CONST, IDISTQ, CSDATA, TJHIST, CALLOD , ORTHCK 

SEG E*, (D) 

IN INTERC, CFIRST, UNPCSV, CSSEN, CONSYS , CSFORC, PACCSV 
IN SNGP0L, DBLP0L, SUM2 , SUMl , SUM3 ,MULDIV,DZLIM, QUAN 
IN QUTZ,SINFCT,HYS, RELAY, DELAY, TIMFCT, USER, RGDIS1 , CNSYSD 
SEG F*,E 

IN DERIVl , MATDMP , MATPRT, FLXAUX, FLXDIS , FLXLOD , GIMRT 
IN FLXCOM, GFEFD, GFMERD , RIGCOM, RIGDIS , RIGLOD , LESK, RIGCLD 
IN FLXCLD, FBAUXQ 


ADDRESS LIMITS 00100 043737 

SEGMENT LOAD TABLE 
STARTING ADDRESS 011003 


044000 144137 
044000 044027 


m 



32868 DBANK 


Kft'ORQS DECIMAL 17888 IBANK 


SEGMENT.. A 012853 088030 12205 1 .. 


NFT VS/FOR 
NBFjOS/FOr 
NCN.V T S/FOR 57 
N C L f j 5 S / M S p C 5 7 

nrblks/hskcss 

NFTCHS/F 0 RS 7 

NSrtTCS/FOR 

NBSBLS/FOr 

NUPDAS/FOk 

N >V B L K $ / H S {■ C 5 7 

NB 0 CVS/F 0 RS 7 

NOTIN S/MSFC 55 

N 0 UT-/FQRB 7 

NFNT' 5 /FORs 7 

N I OERS/f* 

N F C H k ' 

N - : - 

Ek 
IH S i 
N.' lE, 

NFIn 

,.N R R f; L 


I OuluwO. 00 1 0 2 2 


— — — i .. 

001023 0 ^ 1 2 5 5 


001256 1 8 2 8 

1 . 

— 0 0 18 25 y y 1 5 1 3 


0015 18 00 2o » ' 

— — — i 

-002018 

i 

0020,'’ : 

- — — i 

• 0 'GOT'. ,, 0 0 ' 7 

• 

~ v ’ ~ r .j • .■ / 



•"> j 


ij 8 8 0 3 C 08623 1 
86232 E 8 6 3 2 ) 
’6322 Q 86387 
^350 086351 
352 u 8 6 8 q 7 


.0868 12 
086852 
-.86863 
865 1 8 
6533 
656 
>3 3 
, 05 

• , 8 


NFOuT i 

N I E R 3 / 

N C 0 U F 5 / 5 

SQRT 5 /FL 

NERRS/Fo. ■ 1 

Trace. ; 

iNPpLG (Col 
F T 0 R Q (COM M 
S E Q P (COMMON 
0 U T P (COMMON 
RKAhST (COMMO: 

OR BO (COMMON 3 

stvctr (Common 

D I ST Re (Common L _r) 

T b l i N p (Common block) 

0 u T c o M (COMMON BLOCK) 

0 y n i n p (Common block) 

Coni n r (Common b l y c k ) 

MOOEQ (COMMON BLOCK) 

Flag (common rt l o c r j 

IBL AnKsCOM non (COMMON BLOCK) 

maim i 

global ' 3 

5 


t .. - 050 2 6 5 

. .? .. • -*66 0 5 C 8 8 2 

,r ' —050883 0 5 0 8 5 u 

2 . 05085 J o 5 0 5 3 3 

050538 05 1217 

05 I 22 l^ 5 i 73 S 

; 0517 36 052853 

052858 053382 

■ __ _____ 053383 05335 1 

053352 0 5 3 8 3 u 

.O^. 0538 3 1 u58 7 2 7 

058730 056201 

1 - l 5 6 2 0 2 057353 

057358 057862 

j — u 5 7 8 6 3 062125 

062126 066126 

• 066127 102H! 

102182 102751 
102752 120205 
01 1 l 1 l U 1 2 0 12C2u6 1202Q7 

. — 2 -BLANKS-COMMON 

FLAG 2 BLANK SC OH M 0 N 

OYN l NP - 8 0 I 5TRB 



VI. BLOCK DIAGRAM OF MASTCN 

MASTCN is the master control subroutine which controls the program. 














